﻿Imports TepcelDominio
Imports TepcelDAL

Public Class AlmacenBL
    Dim AlmacenDAL As AlmacenDAL
    Public Sub New()
        AlmacenDAL = New AlmacenDAL
    End Sub
    Public Function NuevoAlmacen(ByVal almacen As Almacen)
        Return AlmacenDAL.NuevoAlmacen(almacen)
    End Function

    Public Function GetAllFromAlmacen() As List(Of Almacen)
        Return AlmacenDAL.GetAllFromAlmacen()

    End Function
    Public Function shearchFromAlmacen(ByVal texto As String) As List(Of Almacen)
        Return AlmacenDAL.SearchFromAlmacen(texto)
    End Function

    Public Function DeleteAlmacen(ByVal codigoAlmacen As String) As Boolean
        Return AlmacenDAL.DeleteAlmacen(codigoAlmacen)
    End Function




End Class
